﻿
Partial Class Interfaz_transicionPrincipal
    Inherits System.Web.UI.Page
    Dim CL As New ControladorLogica

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If CL.visibilidadesForms("SistemaGlobal", Session("user").ToString) Then
            Response.Redirect("Index.aspx")
        Else
            Response.Redirect("Seleccion.aspx")
        End If
    End Sub
End Class
